package com.guarantee.server.common.utils;



import com.guarantee.server.common.exception.ServiceException;

import java.math.BigDecimal;
import java.text.DecimalFormat;

/**
 * @Description 精确计算
 * @Author chenli
 * @Date 2019/7/10
 * @Version Copyright (c) 2019,北京乾元坤和科技有限公司 All rights reserved.
 */
public class BigDecimalUtil {

    /**
     * 默认精确的小数位
     */
    private final static int DEF_DIV_SCALE = 12;

    /**
     * 提供精确的加法运算。
     *
     * @param params 参数数组
     * @return 和
     */
    public static BigDecimal add(double... params) {
        BigDecimal b1 = new BigDecimal(0);
        for (double param : params) {
            BigDecimal b2 = new BigDecimal(Double.toString(param));
            b1 = b1.add(b2);
        }
        return b1;
    }

    public static BigDecimal add(BigDecimal... params) {
        BigDecimal b1 = new BigDecimal(0);
        for (BigDecimal param : params) {
            if (param == null) {
                param = valueOf(0);
            }
            b1 = b1.add(param);
        }
        return b1;
    }

    /**
     * 提供精确的减法运算。
     *
     * @param v1 被减数
     * @param v2 减数
     * @return 两个参数的差
     */
    public static double sub(double v1, double v2) {
        BigDecimal b1 = new BigDecimal(Double.toString(v1));
        BigDecimal b2 = new BigDecimal(Double.toString(v2));
        return b1.subtract(b2).doubleValue();
    }

    /**
     * 提供精确的减法运算。
     *
     * @param v1 被减数
     * @param v2 减数
     * @return 两个参数的差
     */
    public static BigDecimal sub(BigDecimal v1, BigDecimal v2) {
        if (v1 == null) {
            v1 = valueOf(0);
        }
        if (v2 == null) {
            v2 = valueOf(0);
        }
        return v1.subtract(v2);
    }

    /**
     * 提供精确的乘法运算。
     *
     * @param params 参数数组
     * @return 动态参数的积
     */
    public static double mul(double... params) {
        BigDecimal b1 = new BigDecimal(1);
        for (double param : params) {
            BigDecimal b2 = new BigDecimal(Double.toString(param));
            b1 = b1.multiply(b2);
        }
        return b1.doubleValue();
    }

    /**
     * 提供精确的乘法运算。
     *
     * @param params 参数数组
     * @return 动态参数的积
     */
    public static BigDecimal mul(BigDecimal... params) {
        BigDecimal b1 = new BigDecimal(1);
        for (BigDecimal param : params) {
            b1 = b1.multiply(param);
        }
        return b1;
    }

    /**
     * 提供（相对）精确的除法运算，当发生除不尽的情况时，精确到 小数点以后DEF_DIV_SCALE位，以后的数字四舍五入。
     *
     * @param v1 被除数
     * @param v2 除数
     * @return 两个参数的商
     */
    public static double div(double v1, double v2) {
        return div(v1, v2, DEF_DIV_SCALE);
    }

    /**
     * 提供（相对）精确的除法运算，当发生除不尽的情况时，精确到 小数点以后DEF_DIV_SCALE位，以后的数字四舍五入。
     *
     * @param v1 被除数
     * @param v2 除数
     * @return 两个参数的商
     */
    public static BigDecimal div(BigDecimal v1, BigDecimal v2) {
        return div(v1, v2, DEF_DIV_SCALE);
    }

    /**
     * 提供（相对）精确的除法运算，当发生除不尽的情况时，精确到 小数点以后DEF_DIV_SCALE位，以后的数字四舍五入。
     *
     * @param scale :
     * @param v1    被除数
     * @param v2    除数
     * @return 两个参数的商
     */
    public static BigDecimal div(int scale, BigDecimal v1, BigDecimal v2) {
        return div(v1, v2, scale);
    }

    /**
     * 提供（相对）精确的除法运算。当发生除不尽的情况时，由scale参数指 定精度，以后的数字四舍五入。
     *
     * @param v1    被除数
     * @param v2    除数
     * @param scale 表示表示需要精确到小数点以后几位。
     * @return 两个参数的商
     */
    public static BigDecimal div(BigDecimal v1, BigDecimal v2, int scale) {
        if (scale < 0) {
            throw new IllegalArgumentException("The scale must be a positive integer or zero");
        }
        //被除数必须大于0
        if (new BigDecimal(0).equals(v2)) {
            throw new RuntimeException("The dividend must be greater than zero");
        }

        //BigDecimal.ROUND_HALF_UP表示四舍五入
        return v1.divide(v2, scale, BigDecimal.ROUND_HALF_UP);
    }

    /**
     * 提供（相对）精确的除法运算。当发生除不尽的情况时，由scale参数指 定精度，以后的数字四舍五入。
     *
     * @param v1           被除数
     * @param v2           除数
     * @param scale        表示表示需要精确到小数点以后几位。
     * @param roundingMode :
     * @return 两个参数的商
     */
    public static BigDecimal div(BigDecimal v1, BigDecimal v2, int scale, int roundingMode) {
        if (scale < 0) {
            throw new IllegalArgumentException("The scale must be a positive integer or zero");
        }
        //被除数必须大于0
        if (new BigDecimal(0).equals(v2)) {
            throw new RuntimeException("The dividend must be greater than zero");
        }

        //BigDecimal.ROUND_HALF_UP表示四舍五入
        return v1.divide(v2, scale, roundingMode);
    }

    /**
     * 提供（相对）精确的除法运算。当发生除不尽的情况时，由scale参数指 定精度，以后的数字四舍五入。
     *
     * @param v1    被除数
     * @param v2    除数
     * @param scale 表示表示需要精确到小数点以后几位。
     * @return 两个参数的商
     */
    public static double div(double v1, double v2, int scale) {
        if (scale < 0) {
            throw new IllegalArgumentException("The scale must be a positive integer or zero");
        }
        //被除数必须大于0
        if (v2 == 0) {
            throw new RuntimeException("The dividend must be greater than zero");
        }

        BigDecimal b1 = new BigDecimal(Double.toString(v1));
        BigDecimal b2 = new BigDecimal(Double.toString(v2));
        //BigDecimal.ROUND_HALF_UP表示四舍五入
        return b1.divide(b2, scale, BigDecimal.ROUND_HALF_UP).doubleValue();
    }

    /**
     * 提供精确的小数位四舍五入处理。
     *
     * @param v     需要四舍五入的数字
     * @param scale 小数点后保留几位
     * @return 四舍五入后的结果
     */
    public static double round(double v, int scale) {
        if (scale < 0) {
            throw new IllegalArgumentException("The scale must be a positive integer or zero");
        }
        BigDecimal b = new BigDecimal(Double.toString(v));
        BigDecimal one = new BigDecimal("1");
        return b.divide(one, scale, BigDecimal.ROUND_HALF_UP).doubleValue();
    }

    /**
     * 提供精确的小数位四舍五入处理。
     *
     * @param v     需要四舍五入的数字
     * @param scale 小数点后保留几位
     * @return 四舍五入后的结果
     */
    public static BigDecimal round(BigDecimal v, int scale) {
        if (scale < 0) {
            throw new IllegalArgumentException("The scale must be a positive integer or zero");
        }
        BigDecimal one = new BigDecimal("1");
        return v.divide(one, scale, BigDecimal.ROUND_HALF_UP);
    }

    /**
     * 提供精确的小数位(2位)四舍五入处理。
     *
     * @param v 需要四舍五入的数字
     * @return 四舍五入后的结果
     */
    public static double round(double v) {
        BigDecimal b = new BigDecimal(Double.toString(v));
        BigDecimal one = new BigDecimal("1");
        return b.divide(one, 2, BigDecimal.ROUND_HALF_UP).doubleValue();
    }

    /**
     * 提供精确的小数位四舍五入处理。
     *
     * @param v     需要四舍五入的数字字符串
     * @param scale 小数点后保留几位
     * @return 四舍五入后的结果
     */
    public static double round(String v, int scale) {
        if (scale < 0) {
            throw new IllegalArgumentException("The scale must be a positive integer or zero");
        }
        BigDecimal b = new BigDecimal(v);
        BigDecimal one = new BigDecimal("1");
        return b.divide(one, scale, BigDecimal.ROUND_HALF_UP).doubleValue();
    }

    /**
     * 提供精确的小数位(2位)四舍五入处理。
     *
     * @param v 需要四舍五入的数字字符串
     * @return 四舍五入后的结果
     */
    public static double round(String v) {
        if (StringUtils.isBlank(v)) {
            return 0;
        }
        BigDecimal b = new BigDecimal(v);
        BigDecimal one = new BigDecimal("1");
        return b.divide(one, 2, BigDecimal.ROUND_HALF_UP).doubleValue();
    }

    /**
     * 提供精确的小数位处理，去掉保留位数后的数字
     *
     * @param v     需要处理的数字
     * @param scale 小数点后保留几位
     * @return 去掉保留位数后的结果
     */
    public static double decimal(double v, int scale) {
        if (scale < 0) {
            throw new IllegalArgumentException("The scale must be a positive integer or zero");
        }
        BigDecimal b = new BigDecimal(Double.toString(v));
        BigDecimal one = new BigDecimal("1");
        return b.divide(one, scale, BigDecimal.ROUND_DOWN).doubleValue();
    }

    /**
     * 提供精确的小数位处理，去掉保留位数后的数字
     *
     * @param bigDecimal :
     * @param scale      :
     * @return :
     */
    public static double decimal(BigDecimal bigDecimal, int scale) {
        return bigDecimal.divide(new BigDecimal("1"), scale, BigDecimal.ROUND_DOWN).doubleValue();
    }

    /**
     * @param num
     * @return BigDecimal
     * @Description: 金额处理，去掉BigDecimal尾部多余的0
     * @Title: removeAmtLastZero
     */
    public static BigDecimal removeAmtLastZero(BigDecimal num) {
        String strNum = num.stripTrailingZeros().toPlainString();
        return new BigDecimal(strNum);
    }

    /**
     * @param num
     * @return BigDecimal
     * @Description: 金额处理，去掉BigDecimal尾部多余的0
     * @Title: removeAmtLastZero
     */
    public static String amtLastZeroToString(BigDecimal num) {
        return num.stripTrailingZeros().toPlainString();
    }

    /**
     * 将对象转换为BigDecimal
     *
     * @param v ：转换对象
     * @return ：
     */
    public static BigDecimal valueOf(Object v) {
        if (v == null) {
            throw new ServiceException("数据异常"+v);
        }
        return new BigDecimal(v.toString());
    }

    /**
     * 将对象转换为BigDecimal
     *
     * @param v ：转换对象
     * @return ：
     */
    public static BigDecimal valueNull(BigDecimal v) {
        if (v == null) {
            return new BigDecimal(0);
        }
        return v;
    }

    /**
     * 将对象转换为BigDecimal
     *
     * @param v ：转换对象
     * @return ：
     */
    public static BigDecimal valueNull(Object v) {
        if (v == null) {
            return new BigDecimal(0);
        }
        return BigDecimalUtil.valueOf(v);
    }

    /**
     * 将对象转换为BigDecimal
     *
     * @param v ：转换对象
     * @return ：
     */
    public static BigDecimal valueNull(String v) {
        if (StringUtils.isBlank(v)) {
            return new BigDecimal(0);
        }
        return BigDecimalUtil.valueOf(v);
    }

    /**
     * 格式化金额
     *
     * @param num    :
     * @param format :
     * @return BigDecimal
     */
    public static String decimalFormat(Object num, String format) {
        if (num == null) {
            return "";
        }
        BigDecimal bigDecimal = removeAmtLastZero(valueOf(num));
        DecimalFormat decimalFormat = new DecimalFormat(format);
        return decimalFormat.format(bigDecimal);
    }

    /**
     * 格式化金额
     *
     * @param num :
     * @return BigDecimal
     */
    public static String decimalFormat(Object num) {
        return decimalFormat(num, "##,##0.00");
    }

    /**
     * 汉语中数字大写
     */
    private static final String[] CN_UPPER_NUMBER = {"零", "壹", "贰", "叁", "肆",
            "伍", "陆", "柒", "捌", "玖"};
    /**
     * 汉语中货币单位大写，这样的设计类似于占位符
     */
    private static final String[] CN_UPPER_MONETRAY_UNIT = {"分", "角", "元",
            "拾", "佰", "仟", "万", "拾", "佰", "仟", "亿", "拾", "佰", "仟", "兆", "拾",
            "佰", "仟"};
    /**
     * 特殊字符：整
     */
    private static final String CN_FULL = "整";
    /**
     * 特殊字符：负
     */
    private static final String CN_NEGATIVE = "负";
    /**
     * 金额的精度，默认值为2
     */
    private static final int MONEY_PRECISION = 2;
    /**
     * 特殊字符：零元整
     */
    private static final String CN_ZEOR_FULL = "零元" + CN_FULL;

    /**
     * 把输入的金额转换为汉语中人民币的大写
     *
     * @param numberOfMoney 输入的金额
     * @return 对应的汉语大写
     */
    public static String bigDecimalToString(BigDecimal numberOfMoney) {
        StringBuffer sb = new StringBuffer();
        // -1, 0, or 1 as the value of this BigDecimal is negative, zero, or
        // positive.
        int signum = numberOfMoney.signum();
        // 零元整的情况
        if (signum == 0) {
            return CN_ZEOR_FULL;
        }
        // 这里会进行金额的四舍五入
        long number = numberOfMoney.movePointRight(MONEY_PRECISION)
                .setScale(0, 4).abs().longValue();
        // 得到小数点后两位值
        long scale = number % 100;
        int numUnit = 0;
        int numIndex = 0;
        boolean getZero = false;
        // 判断最后两位数，一共有四中情况：00 = 0, 01 = 1, 10, 11
        if (!(scale > 0)) {
            numIndex = 2;
            number = number / 100;
            getZero = true;
        }
        if ((scale > 0) && (!(scale % 10 > 0))) {
            numIndex = 1;
            number = number / 10;
            getZero = true;
        }
        int zeroSize = 0;
        while (true) {
            if (number <= 0) {
                break;
            }
            // 每次获取到最后一个数
            numUnit = (int) (number % 10);
            if (numUnit > 0) {
                if ((numIndex == 9) && (zeroSize >= 3)) {
                    sb.insert(0, CN_UPPER_MONETRAY_UNIT[6]);
                }
                if ((numIndex == 13) && (zeroSize >= 3)) {
                    sb.insert(0, CN_UPPER_MONETRAY_UNIT[10]);
                }
                sb.insert(0, CN_UPPER_MONETRAY_UNIT[numIndex]);
                sb.insert(0, CN_UPPER_NUMBER[numUnit]);
                getZero = false;
                zeroSize = 0;
            } else {
                ++zeroSize;
                if (!(getZero)) {
                    sb.insert(0, CN_UPPER_NUMBER[numUnit]);
                }
                if (numIndex == 2) {
                    if (number > 0) {
                        sb.insert(0, CN_UPPER_MONETRAY_UNIT[numIndex]);
                    }
                } else if (((numIndex - 2) % 4 == 0) && (number % 1000 > 0)) {
                    sb.insert(0, CN_UPPER_MONETRAY_UNIT[numIndex]);
                }
                getZero = true;
            }
            // 让number每次都去掉最后一个数
            number = number / 10;
            ++numIndex;
        }
        // 如果signum == -1，则说明输入的数字为负数，就在最前面追加特殊字符：负
        if (signum == -1) {
            sb.insert(0, CN_NEGATIVE);
        }
        // 输入的数字小数点后两位为"00"的情况，则要在最后追加特殊字符：整
        if (!(scale > 0)) {
            sb.append(CN_FULL);
        }
        return sb.toString();
    }

}